home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Source Code / C / Applications / Python 1.3 / Python 1.3 PPC / Tools / bgen / snd / tsnd.py < prev   
Encoding:
Text File  |  1995-10-11  |  421 b   |  19 lines  |  [TEXT/PYTH]
  1. # Show off SndPlay (and some resource manager functions).
  2. # Get a list of all 'snd ' resources in the system and play them all.
  3.  
  4. from Res import *
  5. from Snd import *
  6.  
  7. ch = SndNewChannel(0, 0, None)
  8. print "Channel:", ch
  9.  
  10. type = 'snd '
  11.  
  12. for i in range(CountResources(type)):
  13.     r = GetIndResource(type, i+1)
  14.     print r.GetResInfo(), r.size
  15.     if r.GetResInfo()[0] == 1:
  16.         print "Skipping simple beep"
  17.         continue
  18.     ch.SndPlay(r, 0)
  19.